home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 2010 April / PCWorld0410.iso / redakcyjne / programy / PSPad editor 4.5.4 build 2356 beta / pspad454inst_en.exe / {app} / Context / CAL.DEF < prev    next >
Encoding:
Text File  |  2003-08-30  |  4.0 KB  |  106 lines
  1. ; PSPad clip definition file for CAL (Navision)
  2. ; created by pspad   12.07.2002  09:10
  3. ; author:  martinpa
  4. [Macro definition]
  5. %recordset%=@E Enter recodset
  6. %recordset1%=@E Enter recodset
  7. %prom%=@E Variable
  8. %prom1%=@E Variable
  9. %prom2%=@E Variable
  10. %dialog%=@E Dialog
  11. %ComboFind%=@C Which record:,,-,-;+,'
  12. ;--------------------------------------------------------------------------------
  13. [for .. to .. do | cycle with defined step count]
  14. for %prom% := %prom1% to %prom2% do
  15.    begin
  16.     |
  17.    end;
  18. ;--------------------------------------------------------------------------------
  19. [setrange | set range(what, from, to) ]
  20. %recordset%.setrange(%recordset%."|" , , );
  21. ;--------------------------------------------------------------------------------
  22. [get | get(variable)]
  23. if %recordset%.get(|) then
  24. ;--------------------------------------------------------------------------------
  25. [begin | (begin ... end) ]
  26. begin
  27.  º|
  28. end
  29. ;--------------------------------------------------------------------------------
  30. [repeat | (recordset fetching)]
  31. repeat
  32.  |
  33. until %recordset%.next=0;
  34. ;--------------------------------------------------------------------------------
  35. [if | (condition)]
  36. if º| then
  37.  
  38. ;--------------------------------------------------------------------------------
  39. [calcfields | calcfields(array, .., ..)]
  40. %recordset%.calcfields (|);
  41. ;--------------------------------------------------------------------------------
  42. [message | message(text)]
  43. message(º|);
  44. ;--------------------------------------
  45. [message2 | message(format(integer))]
  46. message(format(º|));
  47. ;--------------------------------------------------------------------------------
  48. [confirm | confirm(text)]
  49. if %prom% confirm(|) then
  50.  
  51. ;--------------------------------------------------------------------------------
  52. [setfilter | setfilter(what,value)]
  53. %recordset%.setfilter(| , ) ;
  54. ;--------------------------------------------------------------------------------
  55. [create | create(object)]
  56. create (º|);
  57. ;--------------------------------------------------------------------------------
  58. [clear | clear(object)]
  59. clear (º|) ;
  60. ;--------------------------------------------------------------------------------
  61. [createtotals | createtotals(array)]
  62. Currreport.createtotals(º|)
  63. ;--------------------------------------------------------------------------------
  64. [testfield | testfield(array,value)]
  65. %recordset%.testfield(|)
  66. ;--------------------------------------------------------------------------------
  67. [round | round(value,decimal)]
  68. round(º| , )
  69. ;--------------------------------------------------------------------------------
  70. [format | format(variable)]
  71. format(º|)
  72. ;--------------------------------------------------------------------------------
  73. [count | recordset.count]
  74. %recordset%.count
  75. ;--------------------------------------------------------------------------------
  76. [setcurrentkey | recordset.setcurrentkey]
  77. %recordset%.setcurrentkey(|);
  78. ;--------------------------------------------------------------------------------
  79. [find | find('-')]
  80. if %recordset%.find(%ComboFind%) then
  81.    |
  82. ;--------------------------------------------------------------------------------
  83. [reset | recordset.reset]
  84. %recordset%.reset;
  85.   |
  86. ;--------------------------------------------------------------------------------
  87. [d.Open | okno.open('text #1#######', variable]
  88. %dialog%.open(|)
  89. ;--------------------------------------------------------------------------------
  90. [d.Update | okno.open(1, variable]
  91. %dialog%|.update()
  92. ;--------------------------------------------------------------------------------
  93. [d.Close | okno.Close
  94. %dialog%|.Close
  95. ;--------------------------------------------------------------------------------
  96. [DATE2DMY | Date2DMY(date)]
  97. date2SMY(º|)
  98. ;--------------------------------------------------------------------------------
  99. [Commit| Commit]
  100. Commit
  101. ;-------------------------------------------------------------------------------
  102. [error| error()]
  103. error(º|);
  104. ;
  105. [TRANSFERFIELDS | rsDestination.TRANSFERFIELDS(rsSource)]
  106. %recordset%.TRANSFERFIELDS(%recordset1%)